Top 10k strings from Spectrum-Sketch (19xx)(Klaus Jahn)(de).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [Z80] (TOSEC-v2007-01-01) /
Back to the directory listing
2 10100ne0100 2 10010n00100 2 100100ne01000 2 100010n0011001111001100ne00011011011000nee0001111000nee 2 01se10001se101se1sw101sw10001sw1 2 ! Bitte eine Taste druecken ! 1 c$=c$+"1"+j$( 1 c$="ee1111nw100001nw1 1 c$="e011110nw01000010n10****01n10****01n10****01n10****01n01000010ne011110" 1 c$="111000111000111000111" 1 c$="000n01000nw0011100n01***10nw001***10n01***100nwww00001***10n0101***100n011****10n01****100n001***1000ne01**11110n001110000ne01000n000" 1 Zum Stoppen eine Taste druecken 1 Spectrum-SKETCH 1 RANDOMIZE USR 6e4 1 POKE 60131,1 1 LET c$=""111000111000111000111 1 Invertieren: 1 Einschraenkung: 1 Druecken Sie 0 um weiterzumachen 1 ;"Treppen" 1 ;"Spectrum-Sketch:" 1 ;"Kursor :"'"Mit Kursortasten umherbewegen";#0 1 ;"Dieses Sprite sieht dann so aus:" 1 ;"Dieser String wuerde dann diesesSprite erzeugen:" 1 ;"Das war ein kleines Beispiel fuer die Faehigkeiten von 1 ;"3D-Bogen" 1 65001 --> Y-Position 1 65000 --> X-Position 1 01ne100001ne1111" 1 ."'"Jetzt koennen Sie sich Ihre 1 )+"1n1n1n1n1n1n1n1n1n1" 1 ''"an. Nachdem der String c$ defi- niert ist, ruft man die Routine mit 1 ''"Wenn Sie z.B. ein kleines Qua- drat zeichnen moechten, schrei- ben Sie:" 1 ''"So, dann wuensche Ich Ihnen nochviel Spass beim Zeichnen !" 1 ''"LET c$=""1 1 ''"LET c$="" 1 '"Wollen Sie ein kleines X schrei-ben, so koennte der String so aussehen:" 1 '"Wie Sie sehen, beginnt die 1 '"Uebrigens werden alle anderen Zeichen ignoriert. D.h., man kann den String auch uebersicht-lich gestalten, wenn man will."'' 1 '"Soll der Normalzustand wieder hergestellt werden, so poken Siewieder eine 1 '"Der Vorteil an SKETCH ist, dass man sich in dem String in alle Himmelsrichtungen umherbewegen kann." 1 ' written by Klaus Jahn 1 $ --- Spectrum-SKETCH --- 1 "Will man Pixel nicht veraendern,so kann man anstelle einer 0 denStern * verwenden." 1 "Um ein solches Sprite zu defi- nieren, gibt man das Bitmuster in dem String c$ an. Wie das ge-schieht, und was man damit fuer Moeglichkeiten hat, zeige ich Ihnen im Folgenden."' 1 "Sehen Sie im Folgenden erst mal ein paar Beispiele; spaeter 1 "Der String darf beliebig lang sein, also koennen beliebig 1 "Dazu benutzt man ganz einfach die Anfangsbuchstaben der 1 "Das Sprite kann an jeder Pixel- stelle des Bildschirms sein. DieX- und Y- Position gibt man in den Adressen"' 1 "Aber wie wird der String defi- niert ?"'"Nun, man gibt die 1 "''"Sollen alle Nullen im String alsEinsen, und alle Einsen als Nul-len interpretiert werden, so geben Sie bitte ein:" 1 "''"Der String c$ darf nicht mit DIMdimesioniert werden."''"Ich nenne Ihnen nocheinmal alle Stringelemente:" 1 """''"Nach dem Aufruf wuerde dann das sichtbar:" 1 plottet einen inversen Pkt. 1 plottet einen Punkt. 1 nenne ich Ihnen noch weitere Moeglichkeiten von SKETCH.": 1 laesst alten Punkt stehen. 1 grosse Sprites definiert werden." 1 fuer WEST (Westen) 1 fuer SOUTH (Sueden) 1 fuer NORTH (Norden) 1 fuer EAST (Osten)" 1 erniedrigt Y-Position 1 erniedrigt X-Positon" 1 erhoeht Y-Position 1 erhoeht X-Position 1 an diese Adresse." 1 Wenn Sie z.B. eine gestrichelte Linie haben moechten, schreiben Sie:" 1 Tschuess ! 1 Sprites selbermachen..." 1 SKETCH-Funktion bei der festge- legten (X,Y)-Position. Jede 1 oder 0 wird einfach als Punkt von links nach rechts abgearbei-tet. Die Buchstaben n,s,w und e verschieben die (X,Y)-Position um einen Pixel." 1 Pixels mit den Ziffern 1 (fuer INK) und 0 (fuer PAPER) an. 1 Himmelsrichtungen:" 1 Felsenstr.12 1 6432 Heringen 1 1 3D-Bogen